home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #3 / Amiga Plus CD - 2002 - No. 03.iso / AmiSoft / Game / Data / Fs_prelude2.lha / Prelude2 / Mod.install < prev    next >
Encoding:
Text File  |  2002-06-12  |  2.5 KB  |  97 lines
  1. ; $VER: Freespace Mod v1.2
  2. ; Script to install Freespace Mods
  3. (complete 0)
  4. (set #locale 0)
  5.  
  6. (set @language (getenv "Language"))
  7.  
  8. ; Englische Locale
  9.  
  10. (set #welcome
  11.  (cat "\nWelcome to this Freespace Mod!!\n\n"
  12.       "This script will install this new mission on your hard disk.\n"
  13.       "\nRemember that this files needs Freespace.\n\n"
  14.       "\nPlease visit our homepages, too.\n"
  15.       "\nhttp://www.amigalien.de"
  16.       "\nhttp://www.amiga-freespace.de.vu"
  17. ))
  18.  
  19. (set #CA-query-text
  20.  (cat "Where do you installed the Freespace main programme?"
  21. ))
  22.  
  23. (set #CA-query-help
  24.  (cat "\nYou must choose the Freespace drawer on your hard disk (e.g. Work:Games/Freespace not Work:Games) but you must not creat a new drawer for this files."))
  25.  
  26. (set #helpdir "english")
  27. (set #pdir "english")
  28.  
  29. ; Deutsche locale:
  30. (
  31.  if (= @language "deutsch") (
  32.  
  33.   (set #welcome
  34.    (cat "\nWillkommen zur Installation der Freespace Mission.\n\n"
  35.         "Dieses Skript wird alle Dateien auf Ihrer Festplatte installieren. Bedenken Sie, dass diese Bilder Freespace benötigen.\n\n"
  36.         "\nBesuchen Sie doch auch mal die Homepages von Amig@lien:\n"
  37.         "\nhttp://www.amigalien.de"
  38.         "\nhttp://www.amiga-freespace.de.vu"
  39.   ))
  40.  
  41.   (set #CA-query-text
  42.    (cat "Bitte wählen Sie das Freespace Verzeichnis aus."
  43.   ))
  44.  
  45.   (set #CA-query-help
  46.    (cat "\nWählen Sie das Freespace Verzeichnis auf ihrer Festplatte aus (z.B. Work:Spiele/Freespace/), in das diese Daten kopiert werden sollen.\n\n"
  47.         "Eine neue Schublade muss nicht erstellt werden."
  48.   ))
  49.  
  50.   (set #locale 1)
  51.   (set #helpdir "deutsch")
  52.   (set #locdir "deutsch")
  53.   (set #pdir "deutsch")
  54.  )
  55. )
  56.  
  57.  
  58. ;********************************************************************
  59.  
  60. (effect "center" "radial" $000000 $000000)
  61. (showmedia "capic" "data/logo_freespace.jpg" "upper_center" "none" 0)
  62. (showmedia "capic" "data/logo_amigalien.gif" "lower_right" "none" 0)
  63. (showmedia "capic" "data/logo_web.jpg" "lower_left" "none" 0)
  64.  
  65. (complete 20)
  66.  
  67. (message #welcome)
  68.  
  69. (set thedir (askdir (prompt #CA-query-text) (help #CA-query-help) (default "Work:")))
  70. (set @default-dest thedir)
  71. (makedir @default-dest)
  72.  
  73. (complete 50)
  74.  
  75. (copyfiles (source "install/data")
  76.            (dest (tackon @default-dest "Data/"))
  77.            (all)
  78. )
  79.  
  80. (complete 70)
  81.  
  82. (showmedia "readme" "Prelude2.guide" "lower_left" "none" 1 "panel")
  83.  
  84. (complete 85)
  85.  
  86. (makedir (tackon @default-dest "Mod_Docs"))
  87.  
  88. (copyfiles (source "Prelude2.guide")
  89.            (dest (tackon @default-dest "Mod_Docs"))
  90.            (all)
  91. )
  92.  
  93. (complete 100)
  94.  
  95. (exit)
  96.  
  97.